home *** CD-ROM | disk | FTP | other *** search
- object MyFrmOpenDlg: TMyFrmOpenDlg
- Left = 244
- Top = 213
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Open'
- ClientHeight = 260
- ClientWidth = 610
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Pitch = fpVariable
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = True
- Position = poScreenCenter
- Scaled = False
- ShowHint = True
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnKeyDown = FormKeyDown
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object ShowTreeBtn: TSpeedButton
- Left = 395
- Top = 3
- Width = 23
- Height = 23
- Hint = 'Show tree (F12)|Show the explorer tree.'
- AllowAllUp = True
- GroupIndex = 2
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333300033333333300030F03333333330333000333333333033333333
- 00033330333300030F0333303333033300033330333333333333333033300033
- 333333300030F033333333303330003333333333333333333333330003333333
- 3333330F03333333333333000333333333333333333333333333}
- Visible = False
- OnClick = ShowTreeBtnClick
- end
- object spdPreview: TSpeedButton
- Left = 390
- Top = 4
- Width = 23
- Height = 22
- Hint = 'Preview|Show the file preview window.'
- AllowAllUp = True
- GroupIndex = 3
- Glyph.Data = {
- 36010000424D3601000000000000760000002800000012000000100000000100
- 040000000000C0000000120B0000120B00001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 777777000000777777770000000007007777777777770FFFFFFF070077777077
- 77770FFFFFFF07007777080777770FFFFFFF07007077708077770FFFFFFF0700
- 080777080800008FFFFF070070807770008FFF00FFFF070077087778070EEFF0
- 8FFF070077707770770FFEFF0FFF070077787770770FFFEF0FFF070077707770
- 770FFFFF0000070077707770770FFFFF07777700777077780700008087777700
- 7770777700777700777777007778777778000087777777007777}
- OnClick = spdPreviewClick
- end
- object ListBtn: TSpeedButton
- Tag = 2
- Left = 344
- Top = 4
- Width = 23
- Height = 22
- Hint = 'List|Displays items in a list.'
- GroupIndex = 1
- Down = True
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
- 22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
- 00028F8288828F82888244222222442222228822222288222222222222222222
- 2222222222222222222222222222222222222FFF22222FFF2222444222224442
- 2222888F2FFF888F2FFF4F4200024F4200028F8288828F828882442222224422
- 2222882222228822222222222222222222222222222222222222222222222222
- 22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
- 00028F8288828F82888244222222442222228822222288222222222222222222
- 2222222222222222222222222222222222222222222222222222}
- NumGlyphs = 2
- OnClick = ListBtnClick
- end
- object LookInTxt: TLabel
- Left = 8
- Top = 8
- Width = 37
- Height = 13
- Caption = 'Look &in:'
- FocusControl = PTShellCombo1
- end
- object UpOneLevelBtn: TSpeedButton
- Left = 284
- Top = 4
- Width = 23
- Height = 22
- Hint = 'Up One Level|Go to the folder one level up.'
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
- 2222222222222222222200000000000000020FBFBFBFBFBFBF020BFBFBFBFBFB
- FB020FBFB000000FBF020BFBF0FBFBFBFB020FBFB0BFBFBFBF020BF00000FBFB
- FB020FBF000FBFBFBF020BFBF0FBFBFBFB020FBFBFBFBFBFBF02000000000000
- 002220BFBFB02222222222000002222222222222222222222222}
- OnClick = UpOneLevelBtnClick
- end
- object DetailsBtn: TSpeedButton
- Tag = 3
- Left = 367
- Top = 4
- Width = 23
- Height = 22
- Hint = 'Details|Displays information about each item in the window.'
- GroupIndex = 1
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
- 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
- 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
- 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
- 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
- 22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
- 22222FFFFFFFFFFFFFFF44444444444444448888888888888888222222222222
- 22222222FFFF2FFF2FFF22200002000200022228888288828882222222222222
- 2222222222222222222222222222222222222222222222222222}
- NumGlyphs = 2
- OnClick = ListBtnClick
- end
- object CreateNewFolderBtn: TSpeedButton
- Left = 314
- Top = 4
- Width = 23
- Height = 22
- Hint = 'Create New Folder|Create a new folder here'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333FFFFFFFFFFF3330000000000033333388888888888F3330BFBFBFBFB0
- 33333383333333338F3330FBFBFBFBF033333383333333338F3330BFBFBFBFB0
- 33333383333333338F3330FBFBFBFBF033033383333333338F3830BFBFBFBFB0
- 30333383333333338F8F30FBFBFBFBF0033333833333333388F3300000000003
- 3030338888888888338F330BFBF03303033333383333833838F3333000033030
- 30333333888833838F8F33333333033333033333333338F33338333333333330
- 33333333333333338F3333333333333333333333333333333333333333333330
- 33333333333333338F3333333333333333333333333333333333}
- NumGlyphs = 2
- OnClick = CreateNewFolderBtnClick
- end
- object pmImgPreview: TPMultiImage
- Left = 424
- Top = 5
- Width = 183
- Height = 250
- GrabHandCursor = 5
- Scrolling = True
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- ImageName = 'file not found'
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 1
- TiffAppend = False
- JPegSaveQuality = 25
- JPegSaveSmooth = 0
- RubberBandBtn = mbLeft
- ParentColor = True
- Stretch = True
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 3
- TabStop = False
- Visible = False
- ZoomBy = 10
- end
- object ctlHTML: TFrameRover
- Left = 422
- Top = 4
- Width = 183
- Height = 251
- OnHotSpotTargetClick = ctlHTMLHotSpotTargetClick
- NoSelect = False
- HistoryMaxCount = 0
- DefFontName = 'Times New Roman'
- DefPreFontName = 'Courier New'
- TabOrder = 4
- WebActive = False
- UserAgent = 'MrKistic'#39's Wiggeda Wack Browser (Ver 0.1)'
- TimeOut = 0
- end
- object Panel1: TPanel
- Left = 0
- Top = 172
- Width = 411
- Height = 88
- BevelOuter = bvNone
- TabOrder = 0
- object Label2: TLabel
- Left = 12
- Top = 10
- Width = 49
- Height = 13
- Caption = 'File &name:'
- FocusControl = FileNameEdt
- end
- object FilesOfTypeTxt: TLabel
- Left = 12
- Top = 38
- Width = 63
- Height = 13
- Caption = 'Files of &type:'
- FocusControl = FileTypesCbx
- end
- object OpenBtn: TButton
- Left = 330
- Top = 4
- Width = 75
- Height = 23
- HelpContext = 28529
- Caption = '&Open'
- Default = True
- ModalResult = 1
- TabOrder = 2
- end
- object FileNameCbx: TComboBox
- Left = 88
- Top = 6
- Width = 224
- Height = 21
- TabStop = False
- ItemHeight = 13
- TabOrder = 6
- Visible = False
- end
- object FileNameEdt: TEdit
- Left = 88
- Top = 6
- Width = 224
- Height = 21
- TabOrder = 0
- OnChange = FileNameEdtChange
- end
- object FileTypesCbx: TPTCombobox
- Left = 88
- Top = 34
- Width = 224
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- OnSelEndOk = FileTypesCbxSelEndOk
- end
- object CancelBtn: TButton
- Left = 330
- Top = 32
- Width = 75
- Height = 23
- HelpContext = 28444
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- end
- object ReadOnlyChk: TCheckBox
- Left = 88
- Top = 60
- Width = 233
- Height = 17
- Caption = 'Open as &read-only'
- TabOrder = 5
- end
- object HelpBtn: TButton
- Left = 330
- Top = 60
- Width = 75
- Height = 23
- Caption = '&Help'
- TabOrder = 4
- Visible = False
- end
- end
- object PTShellCombo1: TPTShellCombo
- Left = 72
- Top = 4
- Width = 206
- Height = 22
- HelpContext = 28456
- ShellList = PTShellList1
- Options = [ptscoAutofill]
- DropDownCount = 16
- TabOrder = 1
- end
- object PTShellList1: TPTShellList
- Left = 0
- Top = 30
- Width = 413
- Height = 137
- HelpContext = 28549
- OnDblClickOpen = PTShellList1DblClickOpen
- OnClick = PTShellList1Click
- OnDblClick = PTShellList1DblClick
- ReadOnly = False
- HideSelection = False
- IconOptions.AutoArrange = True
- MultiSelect = True
- TabOrder = 2
- ViewStyle = vsList
- end
- end
-